home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 41
/
Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso
/
Aminet
/
util
/
arc
/
xadmaster020.lha
/
xad
/
Install
< prev
next >
Wrap
Text File
|
2000-12-03
|
2KB
|
94 lines
; little dirty install script for xadmaster system
; $VER: Install 1.3 (02.10.2000) by SDI
(copylib
(help @copylib-help)
(prompt "Copying xadmaster.library")
(source "Libs/xadmaster.library")
(dest "LIBS:")
(confirm)
)
(copyfiles
(help @copyfiles-help)
(prompt "Copying xadmaster.library clients")
(source "Libs/xad")
(dest "LIBS:xad")
(all)
(confirm)
)
(copyfiles
(help @copyfiles-help)
(prompt "Copying shell tools")
(source "C")
(dest "C:")
(all)
(confirm)
)
(set #dir
(askdir
(prompt "Where should the docs be installed?")
(help @askdir-help)
(default @default-dest)
)
)
(set #catalog
(askchoice
(prompt "Select the language")
(help @askoptions-help)
(choices "deutsch" "english" "français" )
(default 1)
)
)
(if (= #catalog 0) (
(copyfiles
(help @copyfiles-help)
(prompt "Copying xadmaster guide file and shell docs")
(source "Languages/deutsch")
(dest #dir)
(infos)
(all)
(confirm)
)
))
(if (= #catalog 1) (
(copyfiles
(help @copyfiles-help)
(prompt "Copying xadmaster guide file")
(source "xadmaster.guide")
(dest #dir)
(infos)
(all)
(confirm)
)
(copyfiles
(help @copyfiles-help)
(prompt "Copying shell tool docs")
(source "Docs")
(dest #dir)
(infos)
(all)
(confirm)
)
))
(if (= #catalog 2) (
(copyfiles
(help @copyfiles-help)
(prompt "Copying xadmaster guide file and shell docs")
(source "Languages/français")
(dest #dir)
(infos)
(all)
(confirm)
)
))